home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / ID008.dxr / 00020.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  424 b   |  20 lines
  1. on exitFrame
  2.   set the visible of sprite 2 to 1
  3.   puppetSprite(2, 0)
  4.   puppetSprite(3, 1)
  5.   set LastTick to the ticks
  6.   set OriginalTick to the ticks
  7.   repeat while (the ticks - OriginalTick) < 140
  8.     set y to 3 * (the ticks - LastTick)
  9.     set LastTick to the ticks
  10.     set the locV of sprite 3 to the locV of sprite 3 + y
  11.     updateStage()
  12.   end repeat
  13.   unLoad(15, 19)
  14. end
  15.  
  16. on mouseUp
  17.   puppetSprite(3, 0)
  18.   go(114)
  19. end
  20.